home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / UTILENUS / MARXMENU.LZH / MENUS.EXE / SAMPLE.MNU < prev    next >
Text File  |  1990-02-03  |  807b  |  47 lines
  1. ;This menu is a sample of a simple menu.
  2. ;To run this menu type 'MARX SAMPLE'
  3.  
  4. TextColor Yellow Red
  5. ClearScreen
  6. BoxBorderColor Green Blue
  7. BoxInsideColor Yellow Blue
  8. DrawBox 25 7 32 13
  9. WriteCenter '* Sample Menu *'
  10. Writeln
  11. Writeln
  12. Writeln '   A - Directory'
  13. Writeln '   B - Wide Directory'
  14. Writeln '   C - Run ChkDsk'
  15. Writeln '   D - Type Menu to Screen'
  16. Writeln '   E - Edit This Menu'
  17. Writeln '   F - Drop to Dos'
  18. Writeln ' Esc - Exit'
  19. Writeln
  20. Write ' Select: '
  21.  
  22. OnKey 'A'
  23.    DIR
  24.    Pause   ;Lets you see the directory before screen clears
  25.  
  26. Onkey 'B'
  27.    DIR/W
  28.    Pause
  29.  
  30. OnKey 'C'
  31.    CHKDSK
  32.    Pause
  33.  
  34. OnKey 'D'
  35.    TYPE SAMPLE.MNU|MORE
  36.    Pause
  37.  
  38. OnKey 'E'
  39.    TEDIT %MenuFileName
  40.  
  41. OnKey 'F'
  42.    @Echo To Return to the SAMPLE menu type EXIT
  43.    @Echo .
  44.    COMMAND
  45.  
  46.  
  47.